list=$*cloth* as array
--move list [50,0,0]
delete $morphobj*
delete $VAmodel01
delete $VAmodel02
delete $VAmodel03
delete $VAmodel04
global catemp=dummy()
str ="catemp.name=" + "vag" 
execute str
scale catemp [0.01,0.01,0.01]
